object FPrincipal: TFPrincipal
  Left = 0
  Top = 0
  Caption = 'Atualiza Modulos 1.3v'
  ClientHeight = 477
  ClientWidth = 585
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 585
    Height = 41
    Align = alTop
    Color = clSilver
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentBackground = False
    ParentFont = False
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 585
    Height = 390
    Align = alClient
    Color = clSilver
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentBackground = False
    ParentFont = False
    TabOrder = 1
    object DBCtrlGrid1: TDBCtrlGrid
      Left = 1
      Top = 1
      Width = 583
      Height = 388
      Align = alClient
      AllowDelete = False
      AllowInsert = False
      DataSource = DataModulo
      PanelBorder = gbNone
      PanelHeight = 32
      PanelWidth = 566
      TabOrder = 0
      RowCount = 12
      object DBEdit1: TDBEdit
        Left = 40
        Top = 2
        Width = 513
        Height = 24
        DataField = 'NOMMODULO'
        DataSource = DataModulo
        ReadOnly = True
        TabOrder = 0
      end
      object DBCheckBox1: TDBCheckBox
        Left = 16
        Top = 6
        Width = 18
        Height = 16
        DataField = 'INDATUALIZAR'
        DataSource = DataModulo
        TabOrder = 1
        ValueChecked = 'S'
        ValueUnchecked = 'N'
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 431
    Width = 585
    Height = 46
    Align = alBottom
    Color = clSilver
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentBackground = False
    ParentFont = False
    TabOrder = 2
    object BAtualizar: TBitBtn
      Left = 8
      Top = 6
      Width = 100
      Height = 35
      Caption = 'Atualizar'
      DoubleBuffered = True
      ParentDoubleBuffered = False
      TabOrder = 0
      OnClick = BAtualizarClick
    end
    object BFechar: TBitBtn
      Left = 463
      Top = 6
      Width = 100
      Height = 35
      Caption = '&Fechar'
      DoubleBuffered = True
      Glyph.Data = {
        EE070000424DEE070000000000003600000028000000190000001A0000000100
        180000000000B807000000000000000000000000000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFF00FFFFFFFFFFFFFFFFFFF0FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFF0FBFFFFFFFFFFFFFF00FFFFFFFFFFFFEFF1F9445CB90928
        A20C2AA20F2DA4112EA4122FA3112EA4112EA5102FA8102FA80C2CA80A2CAB08
        2BAC072AAC0527A80326AA0225AB0024AB0021A23F56B0EFF0F8FFFFFF00FFFF
        FFF0FBFF445FCB0E32C31437C5193CC51F41C82142C82142C72041C81F41C81D
        41C81B40C91940CC163ECE113CCF0F3ACE0C38CC0836CF0432CF012FCD002BC5
        0025B23F56B0F0FBFF00FFFFFFFFFFFF0A32D1153CD61E44D8264AD92C4FDA2E
        51DB2E50DB2C4FDA2B50DB2A51DC2750DC234EDE1F4DDF1B4BE01748E11245E0
        0D42E1073CE00337DF0032D7002AC50020A1FFFFFF00FFFFFFFFFFFF0E37DB1C
        43DE264CE02F52E13557E1385AE2385BE23659E23459E2335AE32F59E42B57E5
        2655E62153E71B4FE7164CE71048E80A42E7063DE60237DF012FCD0023A8FFFF
        FF00FFFFFFFFFFFF123BDD2449E02F52E13659E23D5EE44061E44061E55C79E8
        9FB0F2DBE2FAF7F9FEF6F8FED5DEFA8FA9F43D6BEC1A51EA144DEA0E47E90841
        E70439E10230CF0124AAFFFFFF00FFFFFFFFFFFF163EDE2B4FE13759E33F60E4
        4565E54968E58CA0EFF5F7FEFFFFFFEFF2FDE3E9FCE2E8FCF0F3FDFFFFFFECF1
        FD678CF11750EA114AEA0B44E8073DE10533CF0326ABFFFFFF00FFFFFFFFFFFF
        1B42DE3155E23D5EE44564E44B69E591A3EFFFFFFFF1F3FDAABAF46583EB3D66
        E73863E75D81EEA2B8F6F3F6FEFBFCFF6389F1134CE90F47E80C40E10A37CF05
        28ACFFFFFF00FFFFFFFFFFFF2046DF385AE34463E44A68E56B84EAF3F5FDEFF2
        FD7C94ED4869E64469E73F66E73964E73260E82B5CE96E90F0F2F5FEE8EDFD34
        63EC144AE71144E10F3BD0082AABFFFFFF00FFFFFFFFFFFF244AE03E5FE44967
        E54F6CE6AEBBF4FFFFFFA6B6F24D6CE64A6AE64568E7FFFFFFFFFFFF3360E82C
        5CE82658E89FB5F6FFFFFF8AA5F3184CE71748E1143ECF0C2EACFFFFFF00FFFF
        FFFFFFFF2B4FE14564E54F6CE65470E7E5E9FBECEFFC6C84EB4E6CE6496AE644
        67E6FFFFFFFFFFFF335EE72B5AE72656E74D75ECEFF3FDD1DBFA1B4DE51B4AE0
        1941CF0F30ABFFFFFF00FFFFFFFFFFFF3053E24B68E55470E75772E8FFFFFFD9
        DEFA526EE74E6BE64968E54465E6FFFFFFFFFFFF315BE52B57E62653E62352E6
        DFE6FBF5F7FE1F4EE5204CDF1D44CE1232AAFFFFFF00FFFFFFFFFFFF3356E250
        6DE75973E85B75E8FFFFFFD8DEF9536EE64E6BE64967E54364E5FFFFFFFFFFFF
        3159E42A55E52551E4214FE4DEE5FBF7F9FE224EE3244EDF2146CD1433ABFFFF
        FF00FFFFFFFFFFFF395BE35772E85E78E85F79E8E9ECFCEAEDFC6A82E94E6BE5
        4967E54363E5FFFFFFFFFFFF3157E32B53E42650E3496CE8EEF1FDD6DEFA254F
        E3284FDD2447CD1734A9FFFFFF00FFFFFFFFFFFF3E5FE45E78E8647DE8637CE8
        B9C4F5FFFFFFA4B2F24E6AE64966E44362E4FFFFFFFFFFFF3155E22B52E2274E
        E29BAEF2FFFFFF95A8F1284FE22B50DD2748CD1936AAFFFFFF00FFFFFFFFFFFF
        3F5FE4647DE96B85EA6982EA8195EDF7F9FEEBEEFC788DEC4B67E54663E4405F
        E43A5BE33457E22F53E26681EAEEF1FDF0F3FD496AE62B51E12D51DD2849CC19
        36A9FFFFFF00FFFFFFFFFFFF4564E56A83EA728AEB6E87EB6881EAA5B3F2FFFF
        FFECEFFCA1B0F25B75E74361E43D5DE45874E897A8F0EEF1FDFFFFFF7A92ED2D
        51E22D52E12E51DC2949CB1A37A9FFFFFF00FFFFFFFFFFFF4866E5728AEB7B92
        EC758DEC6D86EB667FE9A4B2F2FDFDFFFFFFFFE4E8FBD4DBF9D4DBF9E7EBFCFF
        FFFFF6F8FE8196ED3154E13054E23053E13052DC2949CA1A36A8FFFFFF00FFFF
        FFFFFFFF4F6DE67E95ED8A9EEE8398ED778FEC6C85EB6780E97F94ECB5C1F5E9
        ECFCFFFFFFFFFFFFE3E8FBA7B6F3637DE84060E43C5EE3395BE33457E23052DC
        2747CA1734A7FFFFFF00FFFFFFFFFFFF5672E78B9FEF98AAF18FA2EF8197ED75
        8DEC6F88EB6A83EA667FE9627CE85F79E85D78E85A75E85672E75370E74E6CE6
        4867E54262E4395BE23052DC2445CA1330A6FFFFFF00FFFFFFFFFFFF5975E892
        A5F0A0B0F296A8F1869BEE7991EC738CEB6E87EA6A84EA6881E9657EE9647EE9
        627CE95E79E95A76E85471E74E6DE64665E53C5DE32F52DC2042C9102EA5FFFF
        FF00FFFFFFF0FBFF768DEB7D94ED8EA2EF869BEE778EEC6B85EA6881EA647DE9
        607AE95D77E85A75E85974E85672E7516FE6506DE64B6AE54666E53D5FE43457
        E1284CDA1B3DC64A61BCF0FBFF00FFFFFFFFFFFFF1F4FD768DEB5773E7526FE7
        4B68E64766E54362E53D5DE43B5CE33C5DE33B5CE3395AE33557E23456E22E52
        E12D51E12C50E1254AE01F45DE183ED54D67D1F0F1F9FFFFFF00FFFFFFFFFFFF
        FFFFFFF0FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0FBFFFF
        FFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00}
      ParentDoubleBuffered = False
      TabOrder = 1
      OnClick = BFecharClick
    end
  end
  object BaseDados: TSQLConnection
    ConnectionName = 'BASEDADOSORA'
    DriverName = 'Oracle'
    GetDriverFunc = 'getSQLDriverORACLE'
    LibraryName = 'dbxora.dll'
    LoginPrompt = False
    Params.Strings = (
      'drivername=Oracle'
      'Database=SisCorp'
      'User_Name=system'
      'password=1298'
      'decimal separator=,')
    VendorLib = 'oci.dll'
    Left = 328
    Top = 8
  end
  object Modulo: TRBSQL
    Aggregates = <>
    Params = <>
    ProviderName = 'InternalProvider'
    ASQlConnection = BaseDados
    ASqlQuery.MaxBlobSize = -1
    ASqlQuery.Params = <>
    ASqlQuery.SQL.Strings = (
      'Select * from MODULO'
      'ORDER BY SEQMODULO')
    ASqlQuery.SQLConnection = BaseDados
    SQL.Strings = (
      'Select * from MODULO'
      'ORDER BY SEQMODULO')
    Left = 152
    Top = 8
    object ModuloSEQMODULO: TFMTBCDField
      FieldName = 'SEQMODULO'
      Required = True
      Precision = 10
      Size = 0
    end
    object ModuloNOMMODULO: TWideStringField
      FieldName = 'NOMMODULO'
      Size = 50
    end
    object ModuloNOMCAMPOCFG: TWideStringField
      FieldName = 'NOMCAMPOCFG'
      Size = 50
    end
    object ModuloNOMARQUIVOFTP: TWideStringField
      FieldName = 'NOMARQUIVOFTP'
      Size = 150
    end
    object ModuloDATULTIMAATUALIZACAO: TSQLTimeStampField
      FieldName = 'DATULTIMAATUALIZACAO'
    end
    object ModuloINDATUALIZAR: TWideStringField
      FieldName = 'INDATUALIZAR'
      FixedChar = True
      Size = 1
    end
  end
  object DataModulo: TDataSource
    DataSet = Modulo
    Left = 200
    Top = 8
  end
  object Aux: TRBSQL
    Aggregates = <>
    Params = <>
    ProviderName = 'InternalProvider'
    ASQlConnection = BaseDados
    ASqlQuery.MaxBlobSize = -1
    ASqlQuery.Params = <>
    ASqlQuery.SQLConnection = BaseDados
    Left = 432
    Top = 8
  end
  object FTP: TIdFTP
    IPVersion = Id_IPv4
    Host = 'ftp.eficaciaconsultoria.com.br'
    Password = 'rafael12'
    Username = 'eficaciaconsultoria1'
    ProxySettings.ProxyType = fpcmNone
    ProxySettings.Port = 0
    Left = 32
    Top = 8
  end
end
